home *** CD-ROM | disk | FTP | other *** search
- object LabelForm: TLabelForm
- Left = 402
- Top = 181
- Width = 791
- Height = 802
- HorzScrollBar.Range = 1200
- VertScrollBar.Range = 2000
- AutoScroll = False
- Caption = 'LabelForm'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 14
- object QRBand1: TQRBand
- Left = 0
- Top = 22
- Width = 1200
- Height = 66
- Align = alTop
- BandType = rbDetail
- BeforePrint = QRBand1BeforePrint
- Color = clWhite
- ForceNewPage = False
- Frame.Width = 0
- Ruler = qrrInchesHV
- object QRDBText1: TQRDBText
- Left = 14
- Top = 6
- width = 203
- height = 13
- DataSource = CustomerData.CustomerSource
- DataField = 'Company'
- end
- object QRDBText2: TQRDBText
- Left = 14
- Top = 19
- width = 216
- height = 13
- DataSource = CustomerData.CustomerSource
- DataField = 'Addr1'
- end
- object Addr1Label: TQRLabel
- Left = 14
- Top = 32
- width = 91
- height = 14
- Caption = 'Addressline 1'
- AlignToBand = False
- end
- object Addr2Label: TQRLabel
- Left = 14
- Top = 45
- width = 91
- height = 14
- Caption = 'Addressline 2'
- AlignToBand = False
- end
- end
- object QRBand2: TQRBand
- Left = 0
- Top = 0
- Width = 1200
- Height = 22
- Align = alTop
- BandType = rbPageHeader
- Color = clWhite
- ForceNewPage = False
- Frame.Width = 0
- Ruler = qrrNone
- object QRLabel1: TQRLabel
- Left = 11
- Top = 3
- width = 218
- height = 15
- Alignment = taCenter
- Caption = 'QuickReport mailing label demo report'
- AlignToBand = True
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object QRSysData1: TQRSysData
- Left = 644
- Top = 4
- width = 65
- height = 17
- Alignment = taRightJustify
- AlignToBand = True
- AutoSize = False
- Data = qrsPageNumber
- Text = 'Page '
- end
- end
- object QRBand3: TQRBand
- Left = 0
- Top = 88
- Width = 1200
- Height = 657
- Align = alTop
- BandType = rbOverlay
- Color = clWhite
- ForceNewPage = False
- Frame.Width = 0
- Ruler = qrrNone
- object QRLabel2: TQRLabel
- Left = 20
- Top = 404
- width = 643
- height = 122
- Alignment = taCenter
- Caption = 'QuickReport'
- AlignToBand = True
- Font.Color = clNavy
- Font.Height = -107
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- Transparent = True
- end
- object QRLabel3: TQRLabel
- Left = 128
- Top = 536
- width = 407
- height = 74
- Alignment = taCenter
- Caption = 'for Delphi 2.0'
- AlignToBand = True
- Font.Color = 12615680
- Font.Height = -64
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- end
- object Memo1: TMemo
- Left = 32
- Top = 72
- Width = 185
- Height = 89
- Lines.Strings = (
- 'Memo1')
- TabOrder = 0
- end
- end
- object Rep: TQuickReport
- DataSource = CustomerData.CustomerSource
- ColumnMarginInches = 0
- ColumnMarginMM = 0
- Columns = 3
- DisplayPrintDialog = False
- LeftMarginInches = 0
- LeftMarginMM = 0
- Orientation = poPortrait
- ReportTitle = 'QuickReport mailing label demonstration'
- RestartData = True
- SQLCompatible = False
- TitleBeforeHeader = False
- Left = 3
- Top = 100
- end
- end
-